home *** CD-ROM | disk | FTP | other *** search
- on DecreaseSpeed
- global theBackgroundVelocity, theMaxSpeed
- set theBackgroundVelocity to theBackgroundVelocity + 1
- if GetMovingRight() = 1 then
- set theBackgroundVelocity to theBackgroundVelocity + 1
- end if
- if theBackgroundVelocity > theMaxSpeed then
- set theBackgroundVelocity to theMaxSpeed
- end if
- end
-